home *** CD-ROM | disk | FTP | other *** search
/ Quick PC 62 / Quick PC 62.iso / I386 / IIS5_01.CAB / IIS_jsbrwpop.asp < prev    next >
Encoding:
Text File  |  1999-06-03  |  763 b   |  29 lines
  1. <%@ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3. <!-- #include file="../directives.inc" -->
  4.  
  5. <!--#include file="jsbrowser.str"-->
  6.  
  7. <% 
  8. Const LARGE = 1 
  9.  
  10. Dim pg
  11. pg=Request.QueryString("pg")
  12.  
  13. %>
  14.  
  15. <HTML>
  16. <HEAD>
  17. <TITLE><%= L_TITLE_TEXT %></TITLE>
  18. </HEAD>
  19. <% if Instr(Request.ServerVariables("HTTP_USER_AGENT"),"MSIE") then %>
  20. <FRAMESET ROWS="100%" COLS="100%"  BORDER=NO FRAMESPACING=1 FRAMEBORDER=0>
  21.     <FRAME SRC="<%= pg %>" NAME="main" SCROLLING=NO FRAMESPACING=0 BORDER=NO  MARGINHEIGHT=5 MARGINWIDTH=5>
  22. </FRAMESET>
  23. <% else %>
  24. <FRAMESET ROWS="*,0" COLS="100%" BORDER=NO FRAMESPACING=1 FRAMEBORDER=0>
  25.     <FRAME SRC="<%= pg %>" NAME="main" SCROLLING=NO FRAMESPACING=0 BORDER=NO MARGINHEIGHT=5 MARGINWIDTH=5>
  26. </FRAMESET>
  27. <% end if %>
  28. </HTML>
  29.